home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Advisor / CD-ROM Advisor.iso / blender / blen40m / shared.dir / 00777.ls < prev    next >
Encoding:
Text File  |  1994-08-22  |  310 b   |  16 lines
  1. on mouseUp
  2.   global move, s, CONTROLWINDOW
  3.   sound playFile 2, "mmvrrvt.AIF"
  4.   set move to 1
  5.   sound stop 1
  6.   sound stop 2
  7.   repeat with s = 48 down to 1
  8.     puppetSprite(s, 0)
  9.   end repeat
  10.   tell the stage
  11.     play frame "PANIC"
  12.   end tell
  13.   set CONTROLWINDOW to window "CONTROLS"
  14.   forget(CONTROLWINDOW)
  15. end
  16.